home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / CADAR / Permutate / Messiaen-permutation next >
Text File  |  1998-10-22  |  867b  |  29 lines
  1. messiaen-permutation material
  2.  
  3.  
  4. this function uses a permutation-technique used by 
  5. Olivier Messiaen.   
  6. It works like this. 
  7. You number the material and if you want long result the
  8. numbers and positions should not match.
  9. ex:  number   3 1 2
  10.    material '(a b c)                            3 1 2
  11. now you take the material in the number-order '(b c a)
  12. and then the number-order on the new material '(c a b)
  13. and keep on until you get the original pattern.
  14.  
  15. for the moment it uses on way of numbering which you can't
  16. change but that I found to produce nice long material.
  17. I might add a user-changeable version or you could write
  18. your own now you now how it works.
  19. It is really quite simple.
  20.  
  21.  
  22. (messiaen-permutation '(a b c))
  23. ->(B C A C A B A B C)
  24.  
  25. (messiaen-permutation 
  26.  (list-a-scale 'a 6))
  27. ->(B D F E C A D E A C F B E C B F A D C F D A B E F A E B D C A B C D E F)
  28.  
  29.